<!DOCTYPE stack PUBLIC "-//Apple, Inc.//DTD stack V 2.0//EN" "" >
<stack>
<name>in</name>
<id>-1</id>
<cardCount>685</cardCount>
<cardID>108244</cardID>
<listID>165116</listID>
<cantModify><false /></cantModify>
<cantDelete><false /></cantDelete>
<cantAbort><false /></cantAbort>
<cardSize>
<width>512</width>
<height>342</height>
</cardSize>
<script>on findTitleglobal wantedTitleput the name of this card into startingCardask "Look for which title?" with wantedTitleif it is not empty thenput it into wantedTitlefind it in field Titleif offset(it,field Title) is 0 thenanswer "No reference to that title!"elseif the name of this card is startingCard thenlock screengo to next cardfind it in field Titleunlock screenif the name of this card is startingCard thenanswer "Sorry, this is the only reference!"end ifend ifend ifend ifend findTitleon findAuthorglobal wantedAuthorput the name of this card into startingCardask "Look for who?" with wantedAuthorif it is not empty thenput it into wantedAuthorfind whole it in field Authorsif offset(it, field Authors) is 0 thenanswer "No reference by that author!"elseif the name of this card is startingCard thenlock screengo to next cardfind whole it in field Authorsunlock screenend ifend ifend ifend findAuthoron findKeywordglobal wantedKeywordput the name of this card into startingCardask "Search for what keyword?" with wantedKeywordif it is not empty thenput it into wantedKeywordfind it in field Keywordsif offset(it, field Keywords) is 0 thenanswer "Do you want a detailed search?" with "Yes" or "No"if it is "Yes" thenfind wantedKeywordend ifelseif the name of this card is startingCard thenlock screengo to next cardfind it in field Keywordsunlock screenend ifend ifend ifend findKeywordon nextDataCardvisual effect wipe leftgo to next cardrepeat while the short name of this background is "General"visual effect scroll rightgo to next cardend repeatend nextDataCardon previousDataCardvisual effect wipe rightgo to previous cardrepeat while the short name of this background is "General"visual effect scroll leftgo to previous cardend repeatend previousDataCardon fancySortpush this cardvisual effect barn door opengo to card "sortingCard"end fancySorton addKeyword-- jumps to the list of keywords that can be added to the Keyword fieldglobal callingCardput the name of this card into callingCardput field Keywords into callingKeywordsvisual effect barn door opengo to card id 8348if callingKeywords is not empty thenput callingKeywords & ", " into card field keywordListelseput empty into card field keywordListend ifend addKeywordon makeReportvisual effect barn door openpush this cardgo to card "reportingCard"end makeReport</script>